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Latest 65C02 Word 


The 65C02 really does exist, and we now have a 
couple of them. As reported inside, the chips 
we received work in an Apple //e, but not in a 
J}{+. Well that seems to be a problem with the 
NCR chips that I have. Don Lancaster reports 
that his GTE chips work just fine in all flavors 
of Apples. I'm Swapping an NCR processor for 
one of his GTE's, and will have more details 
next month. For the time being, if you buy a 
65C02, be sure to get a guarantee that it will 
work in your Apple. 


6502 Mini-Assembler in Applesoft..........eBOb Sander-Cederlof 


The original Apple II came with a built-in mini-assembler. By 
typing "F666G" in the monitor, you entered a new realm. The 
prompt changed from “*" to “!I"; errors not only earned a “beep” 
but also a printed "?"; and monitor commands were still 
available by typing an initial "$". I learned 6502 programming 
using this little tool, together with the handy “L" disassembly 
command. At the time, none of the other computer systems on 
the market came with either mini-assembler or “L" command. 


A mini-assembler allows you to type in mnemonics rather than 
converting them "by hand". It also will translate branch 
addresses to the relative offsets needed in relative branch 
instructions. It will not retain the source code ona file, 
and will not handle labels. If you want to modify a program, 
you have to use patches or retype the whole thing. A full 
assembler will accept labels and comments, and will have some 
method for working with stored source programs. The S-C Macro 
Assembler, for example, includes a co-resident source program 
editor. The extra features a full assembler can include are 
pee only by the potential market. But mini-assemblers are 
ree. 


A long time ago MICRO published a 6502 mini-assembler written 
in Commodore or OSI BASIC. I started converting it, just for 
fun, into Applesoft. It wasn't long before I realized that my 
thought processes were totally incompatible with the author's 
programming techniques. So I essentially started over. Last 
month the partially finished listing appeared out of some long 
forgotten crack, so I dusted it off and finished the program. 


It operates a lot like the old "F666G" mini-assembler by Steve 
Wozniak. (And, even though it is in Applesoft, it is almost as 
fast.) The initial display is the address "0300" at the left 
margin, and the cursor in column 20 of the top line on an 
otherwise empty screen. You can type RETURN to quit, a colon 
followed by a hex address to change the assembly address, or an 
instruction mnemonic to be assembled. 


I could go into a long-winded explanation of how the program 
works, describing each subroutine. But you can probably read 
the listing easily enough, and there are identifying REM 
statements with each subroutine. The really interesting part 
to me is the structure of the opcode tables which are contained 
as strings in OP$, F$, and E$. These tables are set up in 
lines 2030 through 2050. 


OP$ contains the opcodes names. OP$(1) holds the names of all 
the single byte opcodes. If the input line has no operand data 
after the opcode mnemonic, the program will search through 
OP$(1) and had better find your mnemonic. If not, it is "???" 
for you! Note that the opcode names are three characters each, 
packed into one long string. Also note that ASL, LSR, ROL, and 
ROR appear in this string. These four opcodes can have an 
operand-less mode, as well as any of four modes with operands. 


OP$(2) contains the mnemonics for the relative branches. 
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S-C Macro Assembler (the best there 18!) .cccccccccccccccccccccec ee 580.00 
S-C Macro Assembler Version 1.1 Update. cccccccccccccccscveccccsese Gl se90 


Ss-C Cross Reference VEE 6 i k6 6 is eis WS ew WS 6 Se oe be ew oe ea 20600 
S-C Cross Reference Utility with Complete Source Code........ee0ee2950.00 


S-C Word PL OCEE BOL wo ai a6 Saree Saw ae wh CR Wa SS 5 SKU 00 
As is, with fully commented source code. Needs S-C Macro Assembler. 
Applesoft Source Code on Disk 6.6:666.6 66 06:6:000-0 086 wa ON OSS iw eee ee O00 

Very heavily commented. Requires Applesoft and S-C Assembler. 
ES-CAPE: Extended S-C Applesoft Program EditOr..ccccccccvccccccese 900.00 


AAL Quarterly DISK G e675 646s W566. Swe WE ie RW OE RC OK 66 a eS awe ee OACH $15.00 
Each disk contains all the source code from three issues of "Apple 
Assembly Line", to save you lots of typing and testing time. 


QD#1: Oct-Dec 1980 QD#2: Jan-Mar 1981 QD#3: Apr-Jun 1981 
QD#4: Jul-Sep 1981 QD#5: Oct-Dec 198] QD#6: Jan-Mar 1982 
QD#7: Apr-Jun 1982 QD#8: Jul-Sep 1982 QD#9: Oct-Dec 1982 


QD#10: Jan-Mar 1983 QD#ll: Apr-Jun 1983 
Double Precision Floating Point for AppleSOft..ccrccccccccccsecvee eH I0.00 
Provides 2l-digit precision for Applesoft programs. 


Includes sample Applesoft subroutines for standard math functions. 


FLASH! Integer BASIC Compiler (Laumer Research) ...ccccccccccsesese 979.00 
Source Code for FLASH! Runtime Package... cccccccccccccccccvccccccee 9 392 00 
Full Screen Editor for S-C Macro Assembler (Laumer Research).......$49.00 


The Visible Computer: 6502 (Software Masters).......(reg. $50.00) $45.00 
Super Disk Copy III (Sensible Software) ....ceccceeee (rege. $30.00) $27.00 
Amper-Magic (Anthro-Digital) ...ccccccccccccccccccces (LEQGe $75.00) $67.50 
Amper-Magic Volume 2 (Anthro-Digital) ...cceccccceeee (Lege $35.00) $30.00 
Quick-Trace (ANthro-Digital ) s0i< 666 066 6600 se8 cess cee (LOG. $50.00) $45.00 


DISASM Dis~-Assembler (RAK “WAL @) 6606.6 sled 6 5 6 06s 606 6 oe oe oe wees c< 530.00 


Blank Diskettes (with hub ringS)..c.ccccccccccesee package of 20 for $50.00 
Small 3-ring binder with 10 vinyl disk pages and disksS...........-e$36.00 
Vinyl disk pages, 6"x8.5", hold one disk each.....ecccccecee lO For $6.00 
Reload your own NEC Spinwriter Multi-Strike Film cartridges....each $2.50 
Diskette Mailing ProtectoOrS...ccccccccccccccccccceselL0-99: 40 cents each 
100 or more: 25 cents each 

ZIF Game Socket EXt GNGEC 6 écse-620 6:6 aoe be hw CRESS So Owe eee O20. 00 
Ashby Shift-Key MOO ooo se ase Snel bE OE CRN OSNEWS REN OVER E OL OVO 
Lower-Case Display Encoder ROM... .ccosccccecccccccccccccecesccsccccee Gane 00 
Only Revision level 7 or later Apples. 


STB-80 80-column Display Board (STB Systems) .....eeeeee($249.00) $225.00 
STB-128 128K RAM Card (STB SyStemS)...cccccccccccvesece (9399.00) $350.00 
Grappler+ Printer Interface (Orange MiCro)....ececeeeee ($175.00) $150.00 
Bufferboard 16K Buffer for Grappler (Orange Micro).....($175.00) $150.00 
Buffered Grappler+ NEW!! Interface and 16K Buffer.....($239.00) $200.00 


BookS, BOOKS, BOOKS... cccccccccsecccsccseveseeeCompare Our discount prices! 


Add $1.50 per book for US postage. 


"THE Book of Apple Software 1983 (with supplement)... ($24.90) $18.00 
"The Apple )}[{ Circuit Description", Gayler.....ceeeee ($22.95) $21.00 
"Enhancing Your Apple II, vol. 1", Lancaster.......-.($17.95) $17.00 
"Incredible Secret Money Machine", Lancaster...cccceee ($7295) $7.50 
"Micro Cookbook, vol. 1", Lancaster..cccccccccccceces (915.95) $15.00 
"Beneath Apple DOS", Worth & LECHNEL cc ccccccccccccccs (919.95) $18.00 
"Bag of Tricks", Worth & Lechner, with diskette......($39.95) $36.00 
“Apple Graphics & Arcade Game Design", Stanton.......($19.95) $18.00 
"Assembly Lines: The Book", Roger Wagner...ceccccesee ($19.95) $18.00 
"what's Where in the Apple", Second Edition.....e.e.e.($24.95) $23.00 
“what's Where Guide” (updates first edition) ....ceceve ($9.95) $9.00 
"6502 Assembly Language Programming", Leventhal......($18.95) $18.00 
"6502 Subroutines", Leven thal oc s0 ces 006000 ewes ees ce ce (817695) $17.00 


*** S-C SOFTWARE, P. O. BOX 280300, Dallas, TX 75228 *** 
kit (214) 324-2050 Lelialial 
*** We take Master Charge, VISA and American Express *** 


Foreign orders add postage needed. 
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OP$(3) holds "“JMP" and "JSR". And OP$(4) holds all the rest, 
which I call the complex opcodes. These are the ones which can 
have a variety of addressing modes. 


F$(1) through F$(4) correspond to OP$(1) through OP$(4). Each 
three digit group in one of the F$ strings is the opcode value 
(in decimal) for the corresponding mnemonic from OPS. F$(4) 
contains a base value, which will be augmented to obtain a 
specific value for the particular address mode chosen. 


The complex opcodes can be classified in many different 
ways...1 tried so many I lost count. I finally settled on the 
scheme shown in the two tables below: 


Imm Zp Abs Z,X A,X Z,Y A,Y (X) ()Y 
f oc ih 10 2 18 00 1 


+ 08 O oo 0 Base 
ADC 0 69 65 6D 75 JID -— 79 61 1 61 097 
cup «8 G8 GS Gb DS Bp — Be Gi BI GI 183 
EOR 0 3 45 4D 55 5D — 5 ii 51 ie 0 
LDA O AQ AS B5 BD - BQ Ai B1 Ai 161 
ORA 0 09 #O5 OD 15 1D — 1 01 11 01 001 
SBC O EQ9 E5 ED F5 FD -— FQ E1 F1 Ei 225 
STA 1 -— 85 8D 95 9D = 99 81 91 81 129 


+ 00 0% oc 10 14 1G -= -- Base 
ASL 2 -- 06 OE 16 1B -- -- -- -- 02 002 
LSR — M6 NE 56 SE —- -- == -= 2 066 
ROL - 2 BE 3 a ee 
ROR — 66 6£ 76 7B — -- -- -- 62 098 


i?) 
*g 
»< 
oOo DOAN HD WN FE W APNA 


STY 


The first column of numbers is the opcode class number. These 
numbers are stored in E$ (see line 2050). The next nine 
columns show the hex opcode values for each valid combination 
of opcode and address mode. The last two columns show the 
“base" value in both hex and decimal. 


The top row of numbers (above the dashed lines) shows the 
augment needed to transform a “base™ opcode value into the 
value for a specific address mode. I broke the data into two 
separate tables because the Imm and A,Y columns have one pair 
of values for class 0 and 1 opcodes and another for classes 2 
through 9, The class number is used to select which address 
modes are legal for a given opcode, as well as in selecting the 
augment values. 
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APPLE CL) EAGLE CL) IBM, PC LJ] NORTHSTAR () TRS-80 11 8" |] OSBORNE C) FRANKLIN [1] STANDARD CP/M 8” 


RENT SOI 
BEFORE YOU BUY 


from our 


SOFTWARE 
RENTAL LIBRARY 


You can now RENT the most popular software available for just 
20-25% * of Manufacturers’ Retail Price 
e Eliminate the risk—rent first! 
e 100% of rental fee applies toward purchase 
e All purchases are 20% Off of Manufacturer’s 
Suggested List 
e Rentals are for 7-days (plus 3 days grace for return 
shipping) 


SPECIAL INTRODUCTORY OFFER 


There are now 2 different plans to choose from: 


4 


Join the Business Group, $50.00 per 
year and rent as many business applica- 
tion programs as you like for only 
90-95% of Mfrs. Sugg. Retail Price* 
REMEMBER, THESE ARE NOT DEMOS, BUT ORIGINAL 
UNRESTRICTED SOFTWARE PROGRAMS 


(complete with manuals in original manufacturers’ packages) 
To Immediately Order, or for more information: 


UNITED COMPUTER CORP Toll Free CALL 1-800 992-7777 


Join the Game Group, $25.00 per year 
and rent as many games as you like for 
only 20-25% of Mfrs. Sugg. Retail Price* 


inimum order, 3 game rentals 


ACCOUNTS PAYABLE [] MAILING CD SPELLING () COMMUNICATIONS (1 REAL ESTATE (1) TAXES (J STOCK MARKET [] INVENTORIES” HEATH/ZENITH 89 8” 
439031 TVU3NID CO T1IOUAWd OC TWLN30 2) TVW3IGaW CO SL33HS GV3udS FC ONILNNOD IV OC SSINISNE LF) SFILITILN 2 SYTTIdWOD CF SAWYD CF 038 XONIX 


in California CALL 1-800 992-8888 
a In L.A. County CALL 1-213 823-4400 
Canadian Orders Welcome eS) J AMERICAN | | _— | 


EDUCATIONAL al ACCOUNTS RECEIVABLE (] WORD PROCESSORS DATA BASES] LANGUAGES ( GRAPHICS 
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If you have ever studied the listing of Wozniak'’s mini- 
assembler, you know that his approach was entirely different. 
If you look inside the S-C Macro Assembler you will find yet 
another approach. I suppose there are more approaches than 
existing assemblers. In our line of Cross Assemblers we use 
about five or six different techniques. The choice depends on 
the syntax of the operands and the bit structure of the 
opcodes, as well as whim. 


I have also written a disassembler in Applesoft, and the 


beginnings of a simulator for 6502 code. Maybe they will see 
print in the near future. There is a lot to be learned from 
studying or even writing these kinds of programs, and they can 


even be useful. 


Ue nea 2000: REM MINI-ASSEMBLER FOR APPLE 

120 REM PRINT ee a TWO HEX DIGITS 

130 My mt = rea Af 18 4 2He M - M1 nee HTAB Z:Z = Z + 2: PRINT MID$ (G 
M1 ); MID (G$,M2 + 1,1)3: RETURN 


140 =R 
150 REM POKE AND PRINT OBJECT BYTE 
160 Z = Z + 13; GOSUB 110: POKE AD,M:AD = AD + 1: RETURN 


REM 
180 REM SET UP TWO-BYTE ADDRESS FIELD 
190 HI = INT (X / 256):LO = X - 256 * HI 


210 REM OUTPUT THE OPCODE AND ADDRESS 
220 Z = 7: VTAB PEEK (37):M = OP: GOSUB 160:M = LO: GOSUB 160: IF BY = 3 


THEN M = HI: GOSUB 160 
1000 


240 REM OUTPUT SINGLE=BYTE OPCODES 
250 Z = 7: VTAB PEEK (37) 2M = OP: GOSUB 160: GOTO 1000 


REM 

270 REM PRINT NEXT ADDRESS 

280 Z = 1: CALL = 868:M = INT (AD / 256): GOSUB 110:M = AD - M ® 256: GOSUB 
110: PRINT *3"5: HTAB 20: RETURN 


290 REM ---- nnn nen ene nee nee 
00 REM 0 goNVgR C$ FROM HEX TO DECIMAL 
320 CLs : GOSUB 500: IF CC$ = "#" OR CC$ = "(" THEN CL$ = CC$: GOSUB 
325 IF C ¢ O THEN CLé = "ERR: RETURN 
rex 16 + C: GOSUB 500: IF C > = 0 THEN 330 
30 C bbs = CL$ + cC$: GOSUB 500: IF CC$< > **" THEN 340 
B00 REM a—aenenecee ewe ene nwo nese cena 
510 ne GET NEXT CHAR FROM 


520 I +1: IF I c (c THEN CC$ = %*; - 1: RETURN 
530 éc$ = ae (cb, cha Meee t= 48; “IF (Cc > 9 AND C < 17) ORC > 


REM 
910 VTAB PEEK (37): HTAB 7: PRINT "277" CHR$ (7): REM ERROR 


990 REM q-o3 nnn merece emcee nec eceeene 
1000 PRINT : CALL - 868: GOSUB 260: GOSUB 4000: IF IN$ = "" THEN STOP 
1010 IF RIGHT$ (IN$,1) = ":" THEN C$ = IN$: GOSUB 290:AD = X: GOTO 1000 


1020 L = LEN (IN 1 = ot a L < O THEN N ee 
1025 og ta > CALL 68: HTAB 20:L$ = LEFT$ (IN$,3): IF 


1070 C “acites * 13 1105 ee GOSUB 2100: IF K = 0 THEN 900 

4050° REM sceeecsescccococi ce cee ecececeee 

1051 REM TRY RELATIVE BRANCHES 

1052 S80” RIGHT$ (IN$,L): PRINT L$" "C$: GOSUB 290: IF CL$ = "ERR" THEN 

1033 J = 2: GOSUB 2100: IF K = 0 THEN 1060 

1054 IF CL$ < > ™" THEN 900 

1056 X = X - AD - 2: IF X < = 128 OR X > 127 THEN PRINT "CAN'T BRANCH T 
HAT FAR": GOTO 100 

17h BY = 2:Z = tha + 256 ®# (X < 0): GOTO 190 

10 REM eccecenewcccconcncecneoseecccune 
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1070 REM TRY JMP AND JSR OPCODES 

1080 J = 3: GOSUB 2100: IF K = 0 THEN 1110 

1090 BY = 3: IF CL$ = mm onteN 9 

1100 IF cL§ = "()® AND OP = 76 THEN OP = 108: GOTO 190 

1105 GOTO 900 

1115 REM TRY COMPLEX OPCODES 

1120 J = 4: GOSUB 2100: IF K = 0 THEN 9 

1130 CA = ( MID (Es (K +2) / 3,1)):BY = 2 

1140 IF CL$ = ®" THEN 1660: REM ZPORA 

1150 IF CL$ = "#" THEN 1200: REM IMMEDIATE MODE 

1160 IF CL$ = ",X" THEN 1400: REM ZP,X OR ABS,X 

1170 IF CL$ = "*Y" THEN 1500: REM ZP.Y OR ABS,Y 

1180 IF CL$ = "| X)" THEN 1300: REM ‘zp ) 

1190 IF CL$ = "(},¥" THEN 1350: REM (ZP},Y¥ 

1195 GOTO 900 

1200 REM sceoaccccccccccuce dice ccianieaereteines 

1210 REM IMMEDIATE MODE 

1220 IF X > 255 THEN 900 

1230 CA = 0 THEN OP = OP + 8: GOTO 190 

12 CA = 4 OR CA = 6 OR CA = 7 THEN 190 

1250 GOTO 900 

1310 REM INDIRECT MODE: (...,X) 

1320 IF CA < 2 THEN 190 

1330 GOTO 900 

1360 REM INDIRECT MODE: (<° y 

1 0 IF CA < 2 THEN OP = OP + 4 : GOTO 190 

1380 GOTO 900 

1 ITY g) 0 R hom BS Be Ge he ae oe Ge Ge ae te Ge a > Gp Gp Gp GP Ge GD GDP Gn CP Gr GD: née Gap 

1410 REM ZP,X OR ABS,X 

1420 IF X >’255 THEN 1450: REM ABS,X 

1430 IF CA < 3 OR CA = 5 OR CA = 7 ORCA = 9 THEN OP = OP + 20: GOTO 190 

Vien oP cate. < 3 OR CA = 5 ORCA = 7 THEN OP = OP + 28:BY = 3: GOTO 190 
= = + 28:BY = 3: 

420 Gord 900 

1 500 REM > Gas GRP eer ao Gap Gas Ee Gee te doe Ge ee Gwe is Ge Cp @> GP G2 Ge &> > > Gn Gp Op > > Ge GS 

ce LS se 

1238 Te a eR OREN 158° rue OP = OP + 20: 1070 190 

1540 BY = 3: IF CA = 6 THEN OP = OP + 28: 190 

1550 IF CA < 2 THEN OP = OP + 24: GOTO 6 igo" 

1560 GOTO 900 

1 0 6] REM es Ge OS GH Ge SP Oe Ges Gee See > Sb Gp & E> Ce E> SS OP Op Ep Eh GP GP GP Ep G SP Gh Ge Gs GD 

1610 REM ZP OR, ABS 

1620 OP = OP + 4: IF X > 255 THEN OP = OP + 8:BY = 3 

1830 GOTO. 190 

20 0 EM > Gp GF a= €2 Gp Gn &> GP GP G> Gp &b G2 E> Ge CE OP GP GH aD 2 Gm &o Gn GS Gp ap en He: Gee re 


2010 REM meas stare 
2020 meets HOME : DIM OP$(4) 4) 

oP $( 1s nASLERKCLCCLDCLIEL DEXDEYINXINYLSRNOP PHAPHPPLAPLPROLRORRT TR 
TSSECSEDSEIT AXTAYTSXTXATX 


2032 OP$(2) = "BCCBCSBEOBMIBNEBPLBYCBVS* 
2034 OP ; = "JMPJSR® 
2035 a = "ADCANDCMPEORLDAORASBCST AASLLSRROLRORBITC PXC PYDECINCLDXLDYS 
2040 F$(1) = DOAN OTCRABE VRISAIRO Ee eee ee nnee 
6056248120170 168 1861 leikale 
Agr Fy 3} = abe pl 17624004 018080112 
2045 rea} = "007033 19306516 100122512900206 6034098032224192 194226 16216013 
2050 E$ = aa tooR CE Race yy 89" 
2060 ct = "0123456789 ABCDEF pee! ‘ 
$% 0 at ot 768: GOTO 3000! REM END OF INITIALIZATION, START AT $0300 
REM 


SEARCH OPCODE T ABLE 
O: FOR I = 1 TO LEN ors()) STEP 


IF L$ = MID$ (OP$(J),I,3) 
THEN K ae 200:0P = VAL ( MID$ erga) .K, §)) 


REM 
REM INPUT A LINE _ 


4020 IN$ = ""; Ae ee 48 
4030 I : I > obo Grit "RETURN 
C 


2 nae IN “ing 13 2g RETURN 
4060 IFC = stop : 
4070 GOTO 1030 
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Assembly Listing Into a Text File......seeeceeseeessBill Morgan 


"That's not a bug, that's a feature!" We've all heard (or 
said?) that before, but this time it really seems to be true. 
We have just discovered an undocumented feature in Version 1.1] 
of the S-C Macro Assembler. 


I was trying to see if a program would assemble, and wanted the 
assembly to be as fast as possible. For some reason I didn't 
want to do the obvious thing and just switch the listing off, 
and using a .TA wasn't convenient. So, I stuck a .DU (DUmmy) 
directive at the beginning of my program, and a .ED (End 
Dummy)at the end, figuring that would eliminate the time spent 
writing object code to the disk. When I typed ASM the 
assembler paused a moment for pass one, then started listing 
the beginning of the program. But, when the assembler got to 
the .TF directive the listing stopped and the disk drive 
started spinning. That wasn't supposed to happen! 


When the assembly finished, and the drive stopped turning, I 
CATALOGed the disk to see what had happened. There was a 
Binary file, with the filename from my .TF directive, but 
instead of being much smaller that the source file, it was 
about twice as big. What could be in that file? 


It seemed dangerous to just BLOAD a file that shouldn't exist, 
so I booted up a disk zap program and inspected the disk. That 
Binary file contained the text of the assembly listing, 
starting with the .TF line. Also, the file had no load address 
and length bytes. The first four bytes were "AO AO AO AO", or 
the ASCII codes for four spaces. If I had tried to BLOAD the 
file, it would have loaded at SAOA0, which would have 
immediately clobbered DOS! 


I was preparing a note to warn everybody not to use .TF within 
a .DU - .ED block, when Bob reminded me of how often we WANT an 
assembly listing on a Text file, to read into the S-C Word 
Processor and merge into an article. Why didn't I find out 
what the Word Processor would make of this file? Well, it read 
the file just fine, but discarded the first four bytes, since 
it expects load address and length bytes in a Binary file. In 
most cases that is no problem, since the first line is the .TF 
<filename> directive, and will be discarded anyway. 


Now we have a Binary file containing the text. That's fine 
with the S-C Word Processor, but what about other programs, 
that might require Text files? As it happens, the Macro 
Assembler creates a Target File as a Text file, then updates 
the Catalog to turn it into a Binary file. All we have to do 
is patch the assembler to prevent that change in the tile type. 
That is only a l-byte patch. 


So, all it takes to send the assembly listing to a disk file is 
to begin the program with a .DU and a .TF, and end it with a 
-ED. If you want a real Text file, you only have to patch one 
byte in the assembler. 
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To make a long story short, here's how to create a Text file 
containing an assembly listing: 


1) At the beginning of your program, put the lines: 


0000 DU 
0001 -TF LISTING 


and at the end put: 
65535 - ED 


2) If there is already another .TF directive in your progran, 
insert a "*" at the beginning of the line, to make it into a 
comment. 


3) Enter one of the following patches: 


$1000 Versions: $29DF:0 
$D000 Versions: $C083 C083 EAF9:0 N C080 


4) Type ASM. 
5) And restore the patched location: 


$1000 Versions: S29DF:4 
$D000 Versions: $C083 C083 EAF9:4 N C080 


Now you can load LISTING into a word processor, delete the 
first and last lines, and do whatever you want with it! 


I tried creating an EXEC file to do all those steps 
automatically, but ran into trouble. When the assembly ends 
the EXEC file loses control, and the Text file LISTING doesn't 
get closed. When I can solve that one I'll let you know. 


Osborne Raises Book Prices 


Osborne/McGraw-Hill has raised the prices of most of their 
books. In particular, all of their books which we carry have 
new higher prices. They are still bargains when you consider 
how good they are, and how packed with information: 


Title Was Is Now Our Price 
6502 Assembly Lang Prog $16.99 $18.95 $18.00 
6502 Subroutines $15.95 $17.95 $17.00 
Z-80 Assembly Lang Prog $16.99 $18.95 $18.00 
Z-80 Subroutines $15.95 $17.95 $17.00 
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Speeding-up Text File I/O... ccccccccceccceceseeePaul Schlyter 


In the April 1983 AAL (pages 2-8), Bob Sander-Cederlof 
presented a small patch that I had sent him almost a year 
earlier. The patch greatly speeded up LOAD/BLOAD of long 
files. At the moment, I had recreated a lot of very long 
assembler source files, such as the source code to DOS and 
Applesoft. The long assembly times grew annoying, especially 
when I realized how much time was wasted inside RWTS just 
waiting for the right sector to pass under the R/W head of the 
disk drive! 


Just one note about what was written on the bottom of page 2 of 
that issue: my patch does not influence SAVE/BSAVE at all. 

The read-after-write during a SAVE/BSAVE is made using the 
VERIFY command, and that command already works at top Speed; in 
fact, VERIFY's speed was a major inspiration for my LOAD/BLOAD 
patch. 


Next I tried to speed up SAVE/BSAVE with an equally simple 
patch. I found it was not so easy, mainly because SAVE/BSAVE 
might have to allocate new sectors for the file. I also felt 
it wasn't worth the trouble writing a more complicated patch, 
Since SAVE/BSAVE isn't really used that often. 


Next in line waS a speedup of text file read and write. Here I 
found a great “time-hog” in DOS. The innocent-looking routines 
at SAE68 and SAE7E each require about 800 cycles to execute, 
All they do is to swap a 45-byte area back and forth between 
the file buffers and a local workarea inside the file manager. 
This is of course necessary when you open/close files or switch 
from file to file. But if you're reading the same text file, 
the swapping may. not be needed. Nevertheless, file manager 
Swaps the buffer in and out for: each and every character you 
read or write! This amounts to 256*(800+800) = roughly 410,000 
cycles or 0.4 seconds for each sector you read or write! This 
is about six seconds for each track! And all it does during 
those six seconds is needlessly swap the same 45 bytes back and 
forth! 


The principle of my patch is this: When entering or exiting 
the file manager, first check to see if you're doing something 
else besides reading/writing. If so, just go on as usual. If 
you are reading/writing, check to see if the local workarea 
belongs to the file being read/written. If so, just exit and 
save 800 clock cycles. If not, check to see if it belongs to 
another file. If the workarea contains another file's data, 
put it back into the file buffer where it belongs and then get 
the workarea for the current file. All occurs this when you 
enter the file manager. 


Upon exit from the file manager, if you're reading/writing, 
just set a flag to mark that the local workarea is being used, 
and save the address of the file buffer it came from. This 
always saves 800 cycles. 


Practical tests show that text file reading/writing is done up 
to about 40% faster with this patch installed. This is slower 
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than Diversi-DOS, but on the other hand this patch is 
compatible with S-C assemblers (and almost everything else in 
sight). Also, this patch works equally well for all file 
types; it even speeds up the loading of type-R files with 
RBOOT/RLOAD (from DOS Tool Kit). Diversi-DOS treats T type 
files in a Special way, but does nothing to speed up type-R 
files. And mine is free! 


I put the patch at $300, because there's no free area large 
enough inside DOS where you can put it...especially if you have 
already installed the LOAD/BLOAD speedup described by Bob last 
April. The listing which follows includes code to hook in the 
patches by overwriting the file manager where it calls the two 
workarea transfer subroutines. 


1000 8SA SSAVE S.FAST TEXT (SCHLYTER) 
1020 ® SPEEDUP OF DOS TEXT FILE READ/WRITE 
1030 * BY PAUL SCHLYTER, SWEDEN, MAY 1983. 
0042- 1050 P PNTR .EQ $42,43 DOS VARIABLE 
AEGA- 1070 GET. WRKAREA.FROM.BUFFER .EQ $AE6A 
AETE= 1080 SAVE.WRKAREA.TO.BUFFER .EQ $AE7E 
AEB 1- 1090 SAVE.OLD.WRKAREA [EQ $AE7E+3 
AFO8~ 1100 POINT. TO.WRKAREA.BUFFER .EQ $AF08 
B5BB- 1110 FM.OPCODE °EQ $B5BB 
; i ai ate Bree: ware ween Gm G2 G2 @> @2 Gr Gp Gb Gb Gb GE GD ep 
0300- 4C 60 03 110 IMP 8 oe aut 
1160 * PATCH EXECUTED UPON ENTRY TO FILE MANAGER 
1170 a 1. IF READ/WRITE AND CORRECT WORK AREA, RETURN 
1180 # 2. IF WRONG WORK AREA, SAVE OLD WORK AREA 
1190 : 3. LOAD NEW WORK AREA. 
0303 BB B5 1210 PATCH1 LDA FM.OPCODE IF NOT READ OR WRITE, 
0306- C9 0 1220 CMP #3 DO. AS USUAL 
0308- 90 1 1230 BCC .1 .eeLESS THAN READ/WRITE 
O30A- C9 05 ~—S 12 CMP #5 
030C- BO 12 ~= 1250 BCS .1 .HIGHER THAN READ/WRITE 
O30E- 20 08 AF 1260 JSR POINT. TO.WRKAREA.BUFFER 
0311- A5 42 1270 LDA PNTR CHECK TO SEE IF CORRECT WORKAREA 
0 Fa CD 5D 03 1280 CMP PNTR.S ALREAD LOADED 
0316- DO 0 1290 BNE .1 NO 
0318- A5 4 1300 LDA PNTR+1 
031A- CD 5E 03 1310 CMP PNTR.S+1 
031D- DO 01 1320 BNE .1 NO 
O31F- 60 1330 RTS YES NOTHING ELSE TO D 
1380 ‘ O EXIT NOW AND SAVE 308 CYCLES! 
1360 & OPCODE NOT READ OR WRITE, OR WRONG WORK AREA. 
0320- 2C 5F 03 1370 .1 BIT FLG NEED TO PUT, BACK THIS WORK AREA? 
0323- 11 BP 
§352- 13 1388 CLC yes, CLEAR FLAG 
0326- 6E 5F 03 1400 ROR FLG 
0329- AD 5D 03 1410 LDA PNTR.S 
032C- 85 1420 STA PNTR 
032E- AD 5E 03 1430 LDA PNTR.S+1 
0331- 85 140 STA PNTR+1 
0333- 20 81 AE 1450 JSR SAVE.OLD.WRKAREA 
0336- 4C 6A AE 1460 32 JMP GET.WRKAREA.FRCM.BUFFER 
1480 # PATCH EXECUTED WHEN FILE MANAGER IS FINISHED: 
1190 # 1. IF READ/WRITE, SET FLAG AND SAVE PNTR 
1300 & 2. IF NOT R/W, CLEAR FLAG AND SAVE WORK AREA 
0339- BB B5 1520 PATCH2 LDA FM.OPCODE R/W? 
033C- C9 0 1530 CMP #3 
033E- 90 1 150 BCC .1 NO 
03 0- C9 05 ~= 1550 CMP #5 
0342- BO 12 1560 BCS .1 NO 
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O344- 38 1570 SEC 
O3 aa E 5F 03 1280 ROR FLG pee EERG 
0348-20 08 AF 1590 JSR POINT.T0.WRKAREA.BUFFER 
O34D- 8D 5D 03 1840 STA PNTR.S a 
LDA PNTR 
0352 BB 5E 03 1830 STA PNTR S44 
: S SAVE ANO 
OF86~ 18 1o0 4 CLC Stein ELA ee 
O5T- GE SE 03 1960 ROR FLG 
O36A- NC 7E A 1870 JMP SAVE.WRKAREA.TO.BUFFER 
035D- 00 00 1690 PNTR.S .HS 0000 
035F- 00 1700 FLG HS 00 
1720 ® TO INSTALL, PATCH DOS LIKE THIS: 
1730 & .OR $ABOA 
1750 @ SSR PATCH! 
1750 § 
1700 # OR $B38E 
1770 § JSR PATCH2 
is ® HERE IS ONE WAY TO DO IT: 
er - i 10 INSTALL ent ap oe. 
O309- 82 BP ap 1830 RPA £728, JSR OPCODE 
$388 ep o es 1300 ee tea 
036A- 8D OB AB 1860 STA $ABOB 
cae" AS G3” 1H EBA PERC 
2 A $ABOC 
ae ee gs 
- F 
O377- Ag 03 1810 Poh eR Ho 
: STA $B390 
037C- 60 1930 Ag #839 


ES-CAPE will set your creativity free! 


ES-CAPE will help you develop, enter, and modify 
Applesoft programs. Even if you are only copying a 
program from a magazine, ES-CAPE will help you doit 
three times faster! 


Visualize this: by pressing just a key or two, you can... 

¢ See the disk catalog, select a program, and load it into 
memory. 

¢ Browse through the program a screen or a line at a 
time. 

¢ Edit lines using powerful commands like the word 
processors have: insert, delete, truncate, overtype, 
scan to beginning or end or to a particular character, 
and more. 

¢ See the values of the variables used by your Apple- 
soft program as it ran. 

¢ Save the modified program. ES-CAPE remembers the 
file name for you! 


ES-CAPE is easy to learn and use! 

¢ Well-written User Manual guides you through the 
learning process. 

¢ Handy Quick Reference Card reminds you of all fea- 
tures and commands. 

* Built-in help screens and menus refresh your mem- 
ory. You don’t have to memorize anything! 

¢ The disk is NOT protected! You can put ES-CAPE on 
every disk you own, and make as many backup copie 
as you need. 


ES-CAPE will speed up and simplify your Applesoft 

programming! 

¢ Choose a starting value and step size for automatic 
line numbering. 

¢ Swiftly find all references to a given variable, line 
number, or any other sequence of characters. 

° Quickly and automatically scan your program for any 
sequence of characters and replace them with a new 
spelling. 

¢ Enter commonly used words or phrases with a single 
keystroke. A full set of pre-defined macros is pro- 
vided, which you may modify as you wish. 

* Display a DOS Command Menu with a single key- 
stroke. A second keystroke selects CATALOG, 
LOAD, SAVE, and other common DOS commands. 
You can easily manage a disk-full of programs! 


ES-CAPE is available now at many fine computer 
stores, or directly from S-C Software Corporation. The 
price is only $60. 


S-C SOFTWARE CORPORATION 
2331 Gus Thomasson, Sulte 125 
Dallas, TX 75228 (214) 324-2050 


Professional Apple Software Since 1978 
Visa, MasterCard, American Exprees, COO accepted. 
Apple « @ redemart of Apple Computer inc 
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Making Paul's Patches Fit in DOS...........Bob Sander-Cederlof 
Don't tell me it won't fit! It is so good, it MUST fit! 


Let's see...there are 74 bytes available from $B6B3 thru $B6FC. 


But Paul's pAtcner are 93 bytes long. Maybe if I twist it 
sideways and then hold my mouth just right.... 


Ha! It worked! 


Let me tell you how, but please don't think I am trying to pick 
Paul apart. His analysis and creative programming are 
terrific! He has taught me a lot. 


First I noticed some common code in PATCH] and PATCH2. I made 
a subroutine called CHECK.OPCODE to test for the read or write 
command. I used the carry status to pass back the answer to 
the caller. Then I put the call to POINT.TO.WORKAREA (which 
loads an address into $42 and $43) at the top of the 
subroutine. There's no need to duplicate it in the two 
callers. These changes saved two or three bytes, for a tiny 
penalty in speed. 


I noticed Paul used CLC, ROR FLAG to clear the sign bit of 
FLAG. I save one byte two times by replacing these with LSR 
FLAG. I set up the carry status info in CHECK.OPCODE so that 
carry SET means read/write...this lets me omit the SEC before 
ROR FLAG when I want to turn on the sign bit. 


I noticed that both patches used the current contents of PNTR: 
PATCH] compared PNTR to PNTR.SAVE, while PATCH2 copied PNTR 
into PNTR.SAVE. So I loaded up the contents of PNTR into the 
A- and X-registers inside my CHECK.OPCODE subroutine. This 
saves a few more bytes. 


At lines 1320-1330 in Paul's program he uses BNE to jump around 
an RTS. I changed that to BEQ to an existing RTS further down 
in the program, saving one byte. 


I moved the PNTR.SAVE variable, two bytes, to another area. 
SB5CF and $B5DO are unused, at the end of the file manager 
parameter list. Conveniently, the subroutines which load 
addresses into PNTR refer to three such addresses inside the 
parameter list. (See the code at SAFO8-SAFIC.) The X-register 
is loaded with 0, 2, or 4 to index into the list. By putting 
PNTR.SAVE at the end of the list, I can load the X-register 
with 8 (PNTR.SAVE-S$B5C7) and use the same subroutine, entering 
at SAF12. This takes five bytes instead of twelve for LDA-STA- 
LDA-STA. 


The final shortener I applied was to make the code which clears 
FLAG and copies the workarea to a buffer into a subroutine, 
This is called PATCH4 in my listing. The two lines at PATCH4 
look just like what was in line inside the PATCH] code, but 
different from what was done by the PATCH2 code. 
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GOT A FUNNY DISK? 
..» WANT TO KNOW MORE ABOUT IT? 


Then you 


need the 1 IN 


CAN YOU... 
* edit normal or protected disks? 


(Confidential 
Information 
Advisors) 


* quickly find and recover any intact file, however badly the disk is corrupted? 
x list programs directly from any disk - protected or not? 

* examine textfiles directly from any disk - protected or not? 

* analyse the formatting of normal or protected disks? 

«x decrypt commercial software - or encrypt your own? 

* rapidly auto-search normal or protected disks for anything you like? 

* understand & use the latest copy protection methods? 

* use your Apple as a powerful document retrieval system? 

* make use of an exhaustive knowledge of disk lore? 


YOU CAN NOW — with a little help from these 5 sophisticated disk utilities: 


TRICKY DICK examines, records, deletes, and edits. It can: (1) 
read individual sectors from normal and most protected disks, 
(2) list their contents in BASIC, assembler, ASCII, or hex, (3) 
edit them; (4) write them back to the disk. Tricky Dick 
cunningly bypasses most protection systems, allowing you to 
work on disks with nonstandard formatting, half-tracks, and 
altered DOS marks. It is also a chief executive program that 
directs the following undercover agents: 


THE LINGUIST reads in a trackful of raw data for your Scrutiny, 
translates all the address information, and allows you to inspect 
the track's formatting. It also translates all 3 types of DOS 
encoding (6 & 2,5 &3, 4 & 4), and works with Tricky Dick to list 
and examine programs or textfiles on any protected disk. You 
can use The Linguist to recover valuable files from blown disks, 
improve your programming skills by studying commercial 
software, and analyse standard or altered formatting. 
\ 


THE TRACER rapidly searches normal and most protected 
disks for up to six strings of your choice simultaneously 
(specified in ASCH or hex). The Tracer also verifies disk 
formatting, and sniffs out all hidden catalog or VTOC sectors. 
When it finds something, it transfers control to Tricky Dick and 
puts the cursor over the object of your search. A few further 
keystrokes allow you to make any necessary changes and write 
the sector back to the disk. 


THE CODE BREAKER keeps your programs and textfiles from 
prying eyes by enabling you to translate them into a “secret 
code” during disk storage. This utility also deciphers encrypted 


Send $65.00 Money Order, 


TO GET THE CIA ON THE TRAIL OF YOUR DISKS, SEND $65.00 TO: 
(Checks allow time to clear), to: 


commercial programs, allowing you to use Tricky Dick to read. 
list, and edit software never before accessible to any disk utility. 


THE TRACKER closely shadows the disk drive arm, carefully 
recording all its movements and operations. The Tracker's job 
is to display, on either your screen or printer, alist of every track 
and sector accessed during a LOAD, RUN, SAVE, or any other 
DOS operation. This utility also tells you exactly where a read 
or write occurred during any disk access. Use The Tracker's 
services to locate the precise trouble spots on a clobbered disk, 
to determine sector skew patterns, to discover the location of 
hidden “nibble-count” tracks on protected disks, and to learn 
much more about how DOS works. You'll be surprised to see 
just exactly where the disk arm really does go! 


What's more, you get permanent access to: 


THE CIA FILES, a 50,000+ word book designed to turn you into 
a disk expert. In addition to complete instructions forthe5 CIA 
utilities, the book contains an easy-to-follow hand-holding 
tutorial (written in plain English!) on all aspects of the Apple 
disk. Using the CIA utilities as your personal guides, you 
progress step-by-step to total disk mastery. You'll acquire a 
wealth of skills and information relating to disk repair and file 
recovery, DOS patches. copy protection, disk formatting, 
program encryption, and other vital topics. Much of the 
material has never before appeared in print. 


All programs are UNPROTECTED, and hence can be copied, 
listed, and modified at will. (special patches are described in 
the manual). They require one drive, DOS 3.3, and 48K of RAM. 


Golden Delicious Software Ltd., 350 Fifth Avenue, New York, NY 10001 
Deaiers enquiries invited 
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PATCH2 falls into PATCH4 if the opcode was not read/write. This 
used to clear the flag and call SAE7E; now it is SAE81. Since 
the difference between S$AE7E and SAE81 is a JSR to setup PNTR 
with the workarea address, and since that was alreaday arranged 
by CHECK.OPCODE, I can safely enter at SAE81. 


No doubt if you followed me this far, you can see even more 
ways to save bytes. In fact, I see one extra byte myself! But 
the program is now just the right size for that hole at $B6B3, 
so enough is enough. 


My listing includes some code to install the patches. If you 
assemble my version, and BSAVE it ona binary file 
(A$300,L$6A), you can BRUN it whenever you want to install the 
patches. Or, with version 1.1 of the Macro Assembler just add 
these lines: 


1195 oTF B.FAST TEXT 
1380 ~PH $B6B3 
1790 » EP 


I also worked out the code for using Applesoft POKEs to patch 
it all in, and here it is: 


100 REM TEXT FILE SPEEDUP PATCH 
110 READ N 

: IF N = 0 THEN’ END 
120 READ A 


w 
is) 
cS 
os 


: GOTO 110 

200 DATA 74,46771,32,210,182,144,10,205,207,181, 
208 ,5,236,208,181,240,51,44,252,182,16, 
8,162,8,32,18,175,32,246,182,76,106,174, 
32,8,175,173 

210 DATA 187,181,56,73,3,240,5,73,7,240,1,24,165, 
66,166,67,96,32,210,182,144,10,110, 252,182, 
141 ,207,181,142,208,181,96,78,252,182,76, 
129,174,909 

220 DATA 2,43787,179,182 

230 DATA 2,45967,231,182 

240 DATA 0 


I tested the patches on a 24-sector text file. The file was 
created by using the TEXT command in the S-C Macro Assembler. 

I used EXEC to read it back in. I also wrote a short Applesoft 
program which read the whole file with GET A$ in a loop. Here 
are the results: 


NORMAL PATCHED CHANGE 


TEXT 24 sec 18 sec 25% faster 
EXEC 52 sec 34 sec 35% faster 
GET A$ 30 sec 21 Sec 30% faster 
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1010 Weeeeeuccccesaocceeecnen eee t oo Ss 
1038 s PAUL SCHLYTER'S TEXT FILE SPEED-UP 
1030 # AS MODIFIED BY BOB SANDER-CEDERLOF 
1040 * JUNE 8, 1983 
1050: #eteseee cous oleae een eee 
0042- 1060 PNTR EQ $42,43 on 
AE6A- 1080 COPY.BUFFER.TO.WORKAREA .EQ $AE6A o = 
AEB 4- 1090 SAVE.WORKAREA .EQ $AE8 a > 8 
AFO8- 1100 POINT. TO.WORKAREA "EO SAFO 1 
AF 12= 1110 SETUP. PNTR EQ $AF 12 - Bus 
B5BB- 1120 FM.OPCODE EQ $B5BB < zre 
B5CF- 1 30 PNTR . SAVE -EQ $B5CF ,B5D0 = x 7 2 c ' 
B6B3- 1150 PATCH. AREA .EQ $B6B Eo Oot 
ABOB- 1160 PATCH.LINK1 °EQ $ABO i an 
B36F- 1170 PATCH .LINK2 SEQ $B38F < =z vie ne 
el act Sh 
1210 INSTALL. PATCHES ul. rt 
0300- A249 = 1220 LDX #PATCH.SIZE-1 qez2zah 
0302 BD 20 03 1230 «1 LDA PATCH.CODE,X T2VeeEuW 
0 05 9D B3 Bo 1240 STA PATCH.AREA,X = 
ee we ee 
S30B- 49 B5 «1B70 LDA #PATCH1 ae a 
Siem 3 ap aD akg PA a rite 
0312~ 8D OC AB 1300 STA PATCH.LINK1+1 = = = < 7 
03 if- 8D BF B3 1320 STA PATCH LINK2 oe 
O31A- AQ B6 1330 LDA /PATCH2 ao rk ee 
031C- 8D 90 B3 1340 STA PATCH.LINK2+1 Se haa 
031F- 60 1390 : RTS ‘ssma’ s 
1379 PATCH. CODE ee 
0 -OR $B6B3 u o¢ 8s 
1390 -TA PATCH.CODE Se ae 
[ay i hae ne TEE ee 
B6BE- CD CF BS5 1ad0 CMP PNTR.SAVE <a) oO 
BOE oe 8 ps {ube CEX PNTR.SAVES4 ~SHZ20 
= e fp 1! 
B6CO- FO 1E ‘1450 BEQ PATCH3 YES, RETURN NOW Wide Cec 
Bee Ge TPO ING «1 BF FAs pichwonieae 
BEST 2 ao THRE ae Ee pup tocr 
B6CC- 20 E1 B6 1500 JSR PATCHY CLEAR FLAG, SAVE WORKAREA 
B6OCF- 4C 6A AE 151 0 42 JMP COPY.BUFFER.TO.WORKAREA 
B6D2- 20 E7 B6 1530 PATCH2 JSR CHECK, OPCODE 
Bor deft oc (ese ee Hrieet mor Bn QhvmoTE 
Pop T- Be EC B5 12e0 STA PNTR.SAVE 
B6DD- 8E DO BS 1570 STX PNTR.SAVE+1 
BOEO- 60 Be PATCH3 RTS 
B6E1- 4E FC B6 1600 PATCHY LSR FLAG __ CLEAR SIGN BIT 
BOE4- AC 54 i 30 : JMP SAVE.WORKAREA 
1630 CHECK . OPCODE 
B6E7- 20 08 AF 1640 JSR POINT. TO.WORKAREA 
BEEK Ag BE BD gga Pr orcubd 
B6EE- to 03 1670 EOR #3 READ? 
a an 
Pee FO 04 19 0 BEQ . 
B6F6- 18 1710 CLC 
cao ae on ee 
Bere. & , Rie i 
9750 Soeeesen cccde seca ee seat 
B6FC- 00 1760 FLAG — .HS 00 MUST START WITH FLAG=0 
OOkA- 1788 paTCH.SIZE .EQ ®-PATCHT 
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I think you get the most benefit if the un-patched DOS has to 
work so long between calls to RWTS that the disk motor stops, 


but the patched DOS keeps the motor alive. You save 0.4 
seconds per sector anyway, but you can also save waiting for 


the motor to come up to speed. 


Warning: One danger I noted, and which I am wary of, is that 
FLAG could get out of sync with reality. For example, if 
somehow FLAG was set with the sign bit on before ever calling 
the file manager, it could try to copy the workarea to 
any-old-place in RAM (or ROM, or I/O space). If you install 
the patches after booting, there should be no problem. But 
what happens if you initialize a disk with the patched DOS? I 
think the flag MIGHT turn out wrong. Maybe a little patch is 
needed to insure FLAG starts out clear, and is cleared after 
abnormal exits from file manager (such as RESET). 


Last-Minute Warning: 

DO NOT DO BRUN B.FAST TEXT FROM AN 

EXEC FILE. [IT’S NOT A GOOD IDEA To 

USE A&A TEXT FILE CHANGE THE WAY TEXT 

FILES WORK. 

a TEE REISE TE ES TS I IE 


NEW from Laumer Research 
The S-C Macro Assembler Screen Editor. 


Powerful Screen Editor for assembler files, co-resident with 
the S-C Macro Assembler allowing screen editing when you want 
it and S-C Macro Assembler editing too. Loads in the unused 
4K bank of memory in a 16K Language Card. 


Includes SYSGEN program for configuring standard 40 column 
Apple, 80 column VIDEX, or 80 column STB80 video drivers. 
Ajustable tabs, margins, horizontal and vertical scrolling, 
lines to 248 columns, and much more... 


SOURCE code included. (Lets you learn about screen editors 
and configure for other brands of 80 column boards) 


Based on a popular TI 990 editor for software developers. 
NOTE: this is not a word processor editor. Organized just for 
computer languages. If you work with assembly programs of 100 
lines or more, then a Screen Editor is a MUST! 


Requires 64K APPLE II with Language card and S-C Macro 
Assembler Language Card Version 1.0. 


Price $49.00 from LAUMER RESEARCH 
1832 SCHOOL RD. 
CARROLLTON, TX 75006 


Master Card and Visa accepted (send Name, card number and exp. 
date). Foreign orders add $3.00 shipping (US funds only). 
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65C02 Depa F EMER Cis 6sd 456 46.6 6 ered ee oe oe eee eee ee we DIE Morgan 


I am holding a brand new NCR65C02A. Now I finally believe that 
there is such a creature as a 65C02! NCR's version of this 
processor seems to be the same as GTE's. That is, it has all 
of the enhancements described in the December ‘82 issue of AAL, 
except for the single bit set, reset and branch instructions. 


We have tested the chip in the computers here, and there's good 
news and bad news. As Don Lancaster reported last month, the 
new chip works perfectly in an Apple //e. You just swap 
processors and start using new opcodes. However, 65C02 chips 
do not work in the Apple ][ or Apple ][+. 


I am told that the problem lies in the execution of 
instructions like ASL or INC, which read memory, modify the 
contents, and write the result back to the same address. The 
6502 processor does one read and two writes during such an 
instruction, which is really incorrect. In the 65C02 this has 
been changed to the proper combination of two reads and one 


write, 


Unfortunately, the Apple ][s rely on the timing of the 
read-write-write cycle, and the read-read-write cycle is just 
different enough to cause the system to fail. Hopefully some 
of the hardware specialists can come up with a modification to 
the older Apples to allow the use of the enhanced processors. 


Let's talk about programming the 65C02. With the new chip in a 
//e, Bob and I started tearing into the S-C Word Processor. We 
just went through the code, looking for places to substitute a 
new instruction for several old ones. Come to find out, the 
most useful change is the true Indirect addressing mode, in 
place of Indexed Indirect. That means replacing 


STY YSAVE 

LDY #0 

LDA (POINTER) ,Y 

LDY YSAVE with LDA (POINTER). 


That's replacing 8 bytes with 2 bytes. BRA (BRanch Always) and 
STZ (STore Zero) also came in very handy. 


All things considered, Bob has decided to wait for the Rockwell 
version of the 65C02, because he really wants those single bit 
set, reset, and branch instructions. At last word Rockwell was 
expecting to start shipping in August, so it will be at least 
that long before we have any. NCR's chip costs about $10. The 
Rockwell chip may cost a little more, if and when. We have 
noticed ads offering 65C02's for $35, which just goes to show 
how expensive advertising can be. 


Page 18....Apple Assembly Line......July, 1983......Copyright (C) S-C SOFTWARE 


Apple Peripherals Are All We Make 


That’s Why We’re So Good At It! 


The TIMEMASTER 
Finally, a clock that does it ALL! 


Designed in 1983 using 1.C. technologies that simply did not exist 

when most other Apple clocks were designed. 

Just plug it in and your programs can read the year, month, date, day, 

and time — down to 1 millisecond! 

Powerful 2K ROM driver — No clock could be easier to use. 

Full emulation of most other clocks, including Mountain Hardware’s 

Appleclock (but you'll like the TIMEMASTER mode better). 

Compatible with all of Apple’s languages, CP/M and PASCAL software 

on disk. 

Eight software controlled interrupts so you can execute two programs 

at the same time. (Many examples are includea) 

On board timer lets you time any interval up to 48 days long down to 

the nearest millisecond. 
The TIMEMASTER includes a disk with some really fantastic time 
oriented programs (over 25) plus a DOS dater so it will automatically add 
the date when disk files are created or modified. This disk is over a 
$200.00 value alone — we give the software others sell. All software 
packages for business, data base management and communications are 
made to read the TIMEMASTER. 


If you want the most powerful and the easiest to use clock for your Apple, 


you want a TIMEMASTER. 
PRICE $129.00 


Super Music Synthesizer 


yy 
Complete 16 voice music synthesizer on one card. Just plug it into your 
Apple, connect the audio cable (supplied) to your stereo, boot the 
disk supplied and you are ready to input and play songs. 
It’s easy to program music with our compose software. You will start 
right away at inputting your favorite songs. The Hi-Res screen shows 
what you have entered in standard sheet music format. 
Now with new improved software for the easiest and fastest music 
input system available anywhere. 
We give you lots of software. In addition to Compose and Play 
programs, the disk is filled with over 30 songs ready to play. 
Easy to program in Basic to generate complex sound effects. Now your 
games can have explosions, phaser zaps, train whistles, death cries. 
You name it, this card can do it. 
Four white noise generators which are great for sound effects. 
Plays music in true stereo as well as true discrete quadraphonic. 
Full control of attack, volume, decay, sustain and release. 
Will play songs written for ALF synthesizer (ALF software will not take 
advantage of all the features of this board. Their software sounds the 
same in our synthesizer.) 
Automatic shutoff on power-up or if reset is pushed. 
Many many more features. 


PRICE $159.00 


Z-80 PLUS! 


@ TOTALLY compatible with ALL CP/M software. 
@ Executes the full Z-80 and 8080 instruction set. 
@ Fully compatible with microsoft disks (no pre-boot required). 


@ An on-card PROM eliminates many I.C.’s for a cooler, less power 
consuming board. (We use the Z-80A at a fast 3.58 MHZ) 

@ Does EVERYTHING the other Z-80 boards do, plus Z-80 interrupts. 

@ All new 1983 design incorporates the latest in ILC. technologies. 

@ Complete documentation included. (User must furnish software) 


The 2-80 PLUS turns your Apple into a © P/M based computer. This 

means you can access the largest body of software in existence, Two 

computers in one and the advantages of both, all at an unbelievably low 

price. 

COMING SOON: The Z-80 Plus for the Apple Ill 
PRICE $139.00 


Analog to Digital Converter 


@ Eliminates the Need to Wait for 
A/D Conversion (just PEEK at data) 

@ A/D Process Totally Transparent 
to Apple Cooks like memory) 


e@ 8 Channels 

@ 8 Bit Resolution 

@ On Board Memory 

@ Fast Conversion (078 ms per 
channel) 

The analog to digital conversion takes place on a continuous, Channe! 

sequencing basis. Data is automatically transferred to on board memory 

at the end of each conversion. No A/D converter could be easier to use, 


OurA/D board comes standard with 0, 10V full scale inputs. These inputs 
can be changed by the user to 0, -10V, or -5V, +5V or other ranges as 
necded. 


Information on temperature sensors is given in manual. 

The user connector has +12 and -12 volts on it so you can po 
sensors, 
ACCURACY 


Input Resistance 20K Ohms Typ 


A few applicatiohs may include monitoring and control of @ flow 
@ temperature @ humidity @ wind speed @ wind direction @ light 
intensity @ pressure @ RPM @ storage oscilloscope @ soil moisture 
and many more. 


We also manufacture a 16 channel digital input/output board for 


control applications. PRICE $129.00 


Ile Only: 80 Column, 64K RAM Card 


@ Expand your Apple Ile to 128K memory. 
@ Provides an 80 column text display. 
@ TOTALLY compatible with ALL Apple software and 
languages, there are NO exceptions. 
@ Automatically expands VisiCalc to 95K storage. In 80 columns! 
@ COMPLETE documentation included. (We don’t make you refer to the 
Apple manual as others do.) 


@ Uses the same commands as the Apple 80 column board. 

@ Incorporates the latest high speed, low power I.C. technologies. 

@ Plugs into the Apple Ile expansion slot. 

@ Simply the best expansion card for your Apple tle at any price, offering 
you phenomenal performance at a very nominal price. 


PRICE $149.00 


Our boards are far superior to most of the consumer electronics made today. All I.C.’s are in high quality sockets with mil-spec. Components used throughout. P.C. 
boards are glass-epoxy with gold contacts. Made in America to be the best in the world. All products work in APPLE Ile, {1 and II+. (Except 80 column card.) 


Applied Engineering's products are fully tested with complete documentation and available for immediate delivery. All products are guaranteed with a no hassle two 


year warranty. 
All Orders Shipped Same Day 
Texas Residents Add 5% Sales Tax 
Add $10.00 If Outside U.S.A. 
Dealer Inquiries Welcome 


Send Check or Money Order to: 
APPLIED ENGINEERING 
P.O. Box 470301 
Dallas, TX 75247 


Call (214) 492-2027 


7am to 11pm 7 days a week 
MasterCard, Visa & C.O.D. Welcome 


Apple Assembly Line......July, 1983......-Copyright (C) S-C SOFTWARE....Page 19 


Revised Monitor Patch for ASCII Display....Bob Sander-Cederlof 


Peter Bartlett gave us a nice patch to the Apple Monitor to add 


ASCII display to the memory dump command. 
the Dec 1981 issue of Apple Assembly Line, pages 18-20. 


It was published in 
You 


may remember that Peter's patch over-wrote the cassette tape 


code. 


Last summer I received two suggested modifications to 


Peter's code, and at last I pass them on to you. 


Bruce Field, from Rockville, Maryland: 


"I finally got around 


to building my own EPROM burner the other day, and one of the 
first things I did was to modify my F8 ROM to include an ASCII 


listing with the hex dump. 
submitted by Peter Bartlett. 


code. 


I used the routine originally 
I found a minor problem with this 


"The problem is that I have the modified ROM on an Integer 


BASIC card, and an unmodified ROM on the mother board. 


If I am 


in the modified ROM and want to soft-switch back to the mother 


board, typing 'C081' 


should do it. But with Peter's patch 


location C081 is accessed inside the patch itself, so the card 
switches off with PC pointing inside the cassette tape code! 


“My solution is to leave the loading of the memory location in 


its original position. 
but it still fits inside the cassette tape space. 
I detest flashing characters, I filter these out. 


This makes the patch slightly longer, 
Also, since 
I force 


control characters to inverse mode, and all others to normal 


video." 


QO0O00000 0o 
M32 OO CAO’) EWA) 3O 


eof olofwofofolalolmrayelololololelolololelelol=! 


NA) 2 O00 OI OW! Fu) 


AD BORD AD AD ASAD 8 ant ont ah at ot ot ot et ot 


FCEO- 
FCEt- 
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#SAVE S.MON ASCII DISPLAY (FIELD) 


PATCHES TO ADD ASCII DUMP TO APPLE MONITOR 
ORIGINAL BY PETER BARTLETT 


: MODIFIED BY BRUCE FIELD 
A1L EQ $3C 
COUT ~EQ $FDED 
PRBYTE -EQ $FDDA 
-OR $FDBD 
-TA $ODBD 
Zs JSR PATCH CALL MY PATCH CODE 
~OR $FCC9 
eTA $0CC9 
PATCH PHA SAVE BYTE 
LDA A1L LOW BYTE OF DUMP ADDRESS 
oe #7 MASK LINE POSITION 
re #31 COMPUTE HORIZONTAL OFFSET 
PLA GET BYTE FROM STACK 
PHA KEEP COPY ON STACK 
ORA £230 FORCE NORMAL VIDEO 
CMP #$A0 MAKE CONTROL-CHARS INVERSE 
BCS .1 e+ eNOT CTRL 
AND # sh e» «CTRL 
1 STA ($28),Y STORE IT ON THE SCREEN 
LDY # RESTORE Y 


PLA RECOVER BYTE AGAIN 
JMP PRBYTE 
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Brooke Boering, from Schaumburg, Illinois: “Here is a slightly 
modified version of Peter Bartlett's monitor patch. I modify 
control characters to display as an underline character, and 
lower case codes to inverse video. Other characters display in 


normal video." 


Lees goAVE S.MON ASCII DISPLAY (BOERING) 
1020 ® PATCHES TO ADD ASCII DUMP TO APPLE MONITOR 
1930 # ORIGINAL BY PETER BARTLETT 
1040 ® MODIFIED BY BRUCE FIELD 
1090 . MODIFIED AGAIN BY BROOKE BOERING 
003C~ ene AiL EQ 3c 
FDED=- 1080 COUT «EQ $FDED 
FDDA=- 1090 PRBYTE -EQ $FDDA 
1100 &----— encudicacounacuccneeacsenass 
1110 -OR $FDBD 
1120 ~TA $ODBD 
FDBD= 20 C9 FC 1130 - JSR PATCH CALL MY PATCH CODE 
1150 ~OR $FCC9 
1160 -TA $0CC9 
FCC9- 48 uy PATCH PHA SAVE BYTE 
FCCA- A5 3C 1180 LDA A1L LOW BYTE OF DUMP ADDRESS 
FCCC- 29 07 1190 AND #7 MASK LINE POSITION 
FCCE= 1 1200 CLC 
FCCF- 69 1F 1210 ADC #31 COMPUTE HORIZONTAL OFFSET 
FCD1- A 1220 TAY 
FCD2=- 68 1230 PLA GET BYTE FROM STACK 
FCD3- 48 1240 PHA KEEP COPY ON STACK 
FCD4- 09 80 1250 eeto FORCE NORMAL VIDEO 
FCD6=- C9 AO 1260 CMP #$A0 MAKE CONTROL-CHARS INVERSE 
FCD8- BO 02 1270 BCS .1 «.eNOT CTRL 
FCDA- AQ DF 1280 LDA #$DF MAKE CONTROL INTO UNDERLINE 
FCDC= C9 EO 1290 .1 CMP #$E0 IN LOWER-CASE RANGE? 
FCDE- 90 02 1300 BCC . eeeNO, DISPLAY NORMAL VIDEO 
FCEQ=- 29 1 1348 AND #338 ee 4 FORCE INVERSE VIDEO 
FCE2= 91 2 1320 .2 STA ($28),Y STORE fT ON THE SCREEN 
FCE4- £8 00 1336 LDY #0 RESTORE Y 
FCE6—- 1340 PLA RECOVER BYTE AGAIN 
FCE7- 4C DA FD 1320 JMP PRBYTE 


After assembling Bruce's version above, using the S-C Macro 
Assembler resident in my language card, I installed the patch 


by typing: 


$c083 C083 (write enable RAM card) 
SFCC9<CC9.CE3M (move the patch into the 
cassette space) 


SFDBE:C9 FC (install patch address in JSR) 


And it worked! To install Brooke's code I had to move a few 
more bytes: 


SFCC9<CC9.CE9M 


If you have an Apple //e, or a lower case display adapter in an 
older Apple, you will not want to display lower case characters 
in inverse mode. Everyone seems to have their own preferences 
about how to display the 256 possible hex values on Apple's 
screen. Choose your own favorite] 
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S-C Macro Assembler 


S-C Software Corporation is pleased to introduce the S-C Macro Assembler, the latest version of our most popular product. 
The S-C Assembler li Version 4.0 already has the reputation of being the easiest editor/assembler to learn, to remember, and 
to use...now the S-C Macro Assembler provides a new level of power and performance for the beginner and professional pro- 
grammer alike. 


29 Commands, including a convenient EDIT com- 
mand with 15 subcommands. COPY and REPLACE 
commands further simplify entry and modification of 
even the most complex programs. 


20 Assembler Directives (Pseudo-Ops) provide all 
features necessary for professional software 
development, including conditional assembly and 
macro generation. 


Operates in any Appie Il or Apple II Plus with at least 
32K RAM and one disk drive. Any additional memory 
or disk drives will be used as required. A arguage 
Card version is also included. 


A memory size of 48K allows source programs of 
over 24,000 bytes to be handled entirely within 
RAM. The Language Card version allows source pro- 
grams of over 32,000 bytes. Much larger programs 
can be edited and assembled using the “INCLUDE” 
and “TARGET FILE” capabilities, up to the limit of on- 
line disk storage. 


Programs can be edited, assembled, and tested en- 
tirely within the framework of the S-C Macro 
Assembler. The editor and assembler are co- 
resident, allowing rapid cycles of modification, re- 
assembly, and check-out. All DOS and Apple Monitor 
commands are active as well, providing a familiar in- 
terface to the standard Apple features. 


Uses its own high-speed technique to store source 
files, but also can read or write standard TEXT files. 
You can EXEC in files from another assembler, use 
some other text editor to prepare files, keep a library 
of routines on disk to EXEC into any program, or use 
S-C Macro Assembler to prepare EXEC files for any 
purpose. 


Price is only $80! Includes diskette with Macro 
Assembler and sample programs, a 100-page 
Reference Manual, and a Programmer Reference 
Card. (Registered Owners of S-C Assembler Il Ver- 
sion 4.0 may purchase the upgrade package for only 
$27.50). 


Commands 


Source: NEW, LOAD, SAVE, 
TEXT, HIDE, MERGE 


Editing: LUST, FIND, EDIT, 
DELETE, REPLACE, 
COPY, RENUMBER 


List Control: FAST, SLOW, PRT,” 


Object: ASM, MGO, VAL, 
SYMBOLS 


Miscellaneous: AUTO, MANUAL, 


INCREMENT, MEMORY, 
MNTR, RST, USR 


All Apple Monitor Commands 
All Apple DOS Commands 


Assembler Directives 


.OR 
TA 
TF 
IN 

.EN 
EQ 
.DA 


Origin 

Target Address 
Target File 
Include File 

End of Program 
Equate 

1- or 2-byte Data 
Hex String 

ASCII String 
ASCIil Terminated 
Block Storage 
Title 

Listing Options 
Page Eject 


Conditional Assembly 


Macro Definition 
End of Macro 
User Directive 


Already well-known for excellent support, S-C Software Corporation pledges to continue development of new features, and to 
help owners gain the maximum benefit from the S-C Macro Assembier. in addition to telephone consultation for registered 
owners, a monthly newsletter is available by subscription (currently $15/year). The ‘Apple Assembly Line” covers items of in- 
terest to assembly language programmers at all levels, and has helped many to advance their programming skills. 


“Makes assembly language 
programming on the Apple 


as easy aS programming 


in BASIC.” 


S-C Software Corporation 

2331 Gus Thomasson, Suite 125 

P.O. Box 280300 

Dallas, Texas 75228 

(214) 324-2050 

We take Master Card and Visa 

Apple is a trademark of Apple Computer 
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Answered Prayer.cccccccccccccscsecccceeveeeeBOD Sander-Cederlof 


Last month's headlines bemoaned our burglary, with equipment 
worth over $11000 missing from our offices. And un-measurable 
amounts of software. And a damaged Spinwriter. And no 
insurance. We didn't even have all of the serial numbers 
recorded. The police indicated we should have no hope of 
recovering anything. 


I know that God, who made the heavens and the earth and all 
that is in them, is sovereign. I said, "Thank you for this, 
too. And thank you that we still have enough left to continue 
business. And that nothing irreplaceable was taken." 


And we tried to to put the pieces back together. We bought 
insurance, and recorded all the remaining serial numbers. We 
made backup copies of critical software to be kept at other 
locations. We engraved our driver's license numbers on our 
equipment. We even installed an alarm system. 


After about two hours with a screwdriver and needlenose pliers 
the Spinwriter was back in working condition. Almost as good 
as new...just one crippled foot where it landed when dropped. 
NEC makes durable gear. I spent another 8 hours figuring out 
how to talk to it with a serial interface card (with no 
documentation), and writing the driver program. Once it all 
worked, we were able to print the mailing labels for last 
month's AAL. 


The burglary occured sometime after 8:30 pm, Wednesday night, 
May 25th. The next Wednesday night, after choir practice, we 
took some time to pray. Among other concerns, we prayed about 
the burglary. I suggested, "Let's pray that the burglars be 
caught and the things they took be recovered. It can't hurt to 
ask!" So we did. 


The next day the police received a tip from an informer. They 
went to investigate, just in time to catch two 18-year-olds 
Carrying computers from apartment to car. One of them was a 
well-known burglar, with at least six-year record. The 
equipment matched the description I had given them. Friday 
morning the investigator called: "We have some of your 
computers. You can come and pick them up at noon." Although a 
little dirty, none of the equipment or software was damaged. 
Two thirds of all that had been stolen was recovered! "A 
miracle", the police said. “Amen.” 


The following Monday the police called again. "We have some 


more.” The third computer system, a brand new Apple //e with 
extended 80-column card, two disk drives, monitor, and Epson 


printer had been sold to a technically-minded friend (of the 
burglars) for only $100. Responding to the alternatives 
offered by our excellent police ("Return the computer, or go to 
jail“), the friend brought in all he had bought. Almost 
everything was back in our office! 
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Thursday, June 16th, I was called a third time. "We have 
another disk drive." They also had another FlipFile with about 
15 more diskettes. Now all that is missing is a TI Programmer 
calculator and an old Panasonic Cassette Recorder. 


Yes, God is sovereign, and also He cares about us as 
individuals. He allowed our things to be taken, but not 
everything. He gave us faith to ask for them to be returned. 
And He caused them to be returned. "Trust in the Lord with all 
your heart, and do not lean on your own understanding. In all 
your ways acknowledge Him, and He shall direct your paths." 
[Proverbs 3-5,6] 


Eighty-Column SHOW Command....cccccccccccvesecesRODeErt Bragner 
Istanbul, Turkey 


I make frequent use of the SHOW command for text files (see AAL 
July 1982), and I wanted to see it in 80-column glory on ny 
shiny new //e. If you've tried it, you will have noticed that 
the command places a character in every other column on the 
80-column screen, so you still only see 40-columns of data per 


line! 


The reason is that the SHOW command code calls COUT] at S$FDFO 
for its character output, and COUT] knows nothing about 
80-column output. By calling COUT (S$FDED) instead, the text 
file output will be routed to whatever your current output 
oy. happens to be (including printer, 80-column display, 
etc.). 


If you use the Applesoft on page 27 of that issue to load SHOW, 
all you need to do is change the ninth item on line 100 trom 
240 to 237. 


Here is the modified POKEr, complete with the additions made by 
Bil Morgan in the June 83 issue, to save you hunting through 
all those back issues: 


100 DATA 21,42319,32,163,162,169,141,32,237,253,32,142, 
174,240,5,32,140,166,208, 243, 76,252,162 

110 DATA 23,44686,173,0,192,16,17,141,16,192,201,141, 
240,10,173,0,192,16,251,141,16,192,201,141,96 

115 DATA 13,44709,224,0,240,4,162,2,208,2,162,4,76,3,171 

116 DATA 3,43773,76,165,174 

120 DATA 4,43140,83,72,79,215 

130 DATA 2,43273,32,48 

140 DATA 0 

150 READ N : IF N THEN READ A 


3; F =] 
: READ D : POKE A+I-1,D NEXT : GO TO 150 
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Explanation of the new DOS Append Bug.......eeeeeeeTOM Weishaar 
Overland Park, Kansas 


{ Tom is author of ProntoDOS, published by Beagle Bros, an 
excellent speed-enhanced DOS which happens to be compatible 
with nearly everything. He also writes the monthly DOStalk 
column in Softalk Magazine. ] 


I was behind on my reading when I wrote, in the April Softalk 
DOStalk, about the changes Apple made to DOS 3.3 in the new //e 
release. At that time I noticed the routine used to calculate 
random access file position at $B331 had been modified, but the 
change looked insignificant to me. 


It turns out this change was supposed to fix another bug in the 
Append command! The change was very well documented by Art 
Schumer in the August 1982 Call APPLE, page 57. 


In pre-//e DOS, Append called on this random-access file 
position calculator to reset the position-in-file pointer. As 
you know, Append simply looks through a file byte-by-byte until 
it finds the end, which can be indicated either by a zero byte 
or by a lack of additional sectors. 


When Append finds a zero byte in the file, it knows it has 
reached the end, but by then the position-in-file pointer is 
one byte beyond the zero and has to be backed up. Somebody 
once thought a call to the random-access file position 
calculator would be a good way to do this. 


But on sequential files (the only kind you can append to) the 
File Manager uses a record length of one. Thus files longer 
than 32767 bytes come to this routine with more than 32767 
"records", which is beyond what DOS normally allows. The 
calculation fails. 


Schumer's patch gets it to calculate correctly right up to 
65535. At that point it stops working for good. Apple tried 
to get around this in //e-DOS by throwing out Append's reliance 
on the random-access calculator. Instead they go back in and 
change the position-in-file ‘pointer directly, then trick the 
File Manager into re-saving his workarea. 


Problem: they only decrement the low byte of the position-in- 
file pointer. If the file-ending zero comes in the last byte 
of a sector, the high byte will have been advanced to point at 
the next sector. Since they don't decrement it, the position- 
Te aa pointer is 256 bytes beyond where it should be. 

U ae | 


I've been trying to get folks at Apple to recognize the 
problem, but Append doesn't appear to be one of their 
priorities. If they don't do something soon I'll publish a 
patch in Softalk. I'd do it now, but I fear treading where so 
Many have failed before me. 
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The new 1983 edition of DOS 3.3.....eeeeeeeBOb Sanaer-Cederlof 


Co-incident with the release of the //e, Apple started shipping 
a slightly modified version of DOS 3.3. Three changes are 
evident: the sample programs have been moved to a separate 
diskette; a few instructions to kill 80-column display during a 
boot were added; and yet another patch to the APPEND command. 


I booted an old DOS 3.3, and then used monitor move to make a 
copy in memory running from 5D00-7FFF of the DOS image. Then I 
booted the new DOS, which loaded into 9DO0-BFFF. Using the 
monitor “V" command, I located all of the changes. It was a 
little tricky skipping over the variables and buffers, but with 
the aid of a well-worn copy of “Beneath Apple DOS" I managed. 
Here are all the changes I found: 


Old DOS 3.3 New DOS 3.3 
A6BB:EA NOP A6BB:20 69 BA JSR SBA69 
A6BC:EA NOP 
A6BD: EA NOP 
A6BE:A2 00 LDX #0 A6BE: unchanged 


A6C0:8E C3 B5 STX $B5C3 
A6C3:60 RTS 


The code above is jumped to from one of the older APPEND 
patches at SB6A8. It used to be JMP SA6BC, and has been 
changed to JMP SA6BB to pick up the new JSR there. 


The Yatter part of the file position calculator has been 
re-written to assure carry is clear before adding record size 
to previous position. 


Old DOS 3.3 New DOS 3.3 

B33E:AD BF B5 LDA $B5BF B33E:18 CLC 
B341:8D EC B5 STA $B5EC B33F:AD BF B5 LDA S$B5BF 
B344:6D E6 BS ADC S$B5E6 B342:8D EC B5 STA $B5EC 
B347:8D E6 BS STA SB5E6 B345:6D E6 B5 ADC S$B5E6 
B34A:AD CO B5 LDA S$B5CO0 B348:8D E6 B5 STA SB5E6 
B34D:8D ED B5 STA S$B5ED B34B:AD CO B5 LDA $B5CO0 
B350:6D E4 BS ADC SB5E4 B34E:8D ED B5 STA $B5ED 
B353:8D E4 B5 STA SB5E4 B351:6D E4 B5 ADC $B5E4 
B356:A9 00 LDA #0 B354:8D E4 B5 STA SB5E4 
B358:6D E5 BS ADC $B5E6 BE57:90 03 BCC $B35C 
B35B:8D E5 B5 STA $B5E5 BE59:EE E5 B5 INC $B5E5 
B35E:60 RTS BE5C: 60 RTS 

BE5D:00 00 filler 


Note that there was room for adding the CLC at the top, because 


of the in-efficiency of the original code. 
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QuICKTRACE 


relocatable program traces and displays the actual machine operations, while it is running 
without Interfering with those operations. Look at these FEATURES: 


Single-Step mode displays the last instruction, 
next instruction, registers, flags, stack contents, 
and six user-definable memory locations. 


Trace mode gives a running display of the Single- 
Step information and can be made to stop upon 
encountering any of nine user-definable 
conditions. 


Background mode permits tracing with no display 
until it is desired. Debugged routines run at near 
normal speed until one of the stopping cond- 
Itions is met, which causes the program to return 
to Single-Step. 


QUICK TRACE allows changes to the stack, 
registers, stopping conditions, addresses to be 
displayed, and output destinations for all this 
Information. All this can be done in Single-Step 
mode while running. 


Two optional display formats can show a sequence 
of operations at once. Usually, the information 
is given in four lines at the bottom of the screen. 


QUICK TRACE is completely transparent to the 
program being traced. It will not interfere with 
the stack, program, or I/O. 


QUICK TRACE is relocatable to any free part of 
memory. Its output can be sent to any slot or to 
the screen. 


QUICK TRACE is completely compatible with 
programs using Applesoft and Integer BASICs, 
graphics, and DOS. (Time dependent DOS 
operations can be bypassed.) It will display the 
graphics on the screen while QUICK TRACE Is 
alive. 


QUICK TRACE is a beautiful way to show the 


incredibly complex sequence of operations that 
a computer goes through in executing a program 


Quick TRACE $50 


Is a trademark of Anthro-Digital, Inc. 
Copyright © 1981 
Written by John Rogers 


See these programs at participating Computerland and other 


fine computer stores. 


Anthro - Digital Software, Inc. 


P.O. Box 1385 Pittsfield, MA 01202 
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Code executed at the end of a boot has been modified to clear 
80-column mode in case you are booting in an Apple //e. 


Old DOS 3.3 New DOS 3.3 


BFD6:4C 44 B7 JMP $B744 BFD6:20 76 BA JSR $BA76 
BFD9:4C 44 B7 JMP $B744 


Three patches were stuffed into the hole at $BA69. 
Called from SA6BB: 


BA69:AE 5F AA LDX SAASF If last command was 


BA6C:E0O 1C CPX #S$1C APPEND, clear flag 
BA6E:FO 05 BEQ $BA75 Not APPEND 

BA70:A2 00 LDX #0 Yes, APPEND 
BA72:8E 5D B6 STX S$B65D Clear APPEND flag 
BA75 :60 RTS 


Called from SBFD6: 


BA76:A9 FF LDA #SFF 


BA78:8D FB 04 STA S$O4FB MODE = SFF 

BA7B:8D OC CO STA $C00C 80-column display OFF 
BA7E:8D OE CO STA SCOOE Alternate Char Set OFF 
BA81:4C 2F FB JMP SFB2F Exit via monitor INIT 


Called from $B683: 


BA84:AD BD B5 LDA $B5BD Previous file position 
BA87:8D E6 B5 STA SB5E6 LSB of fle position 
BA8A:8D EA B5 STA SB5EA Record # 

BA8D:BA TSX 

BA8E:8E 9B B3 STX $B39B Save stack position 
BA91:4C 7F B3 JMP S$B37F Leave File Manager 


Note that this last patch jumps into the file manager exit 
routine even though the file manager had not been entered. The 
purpose is to save a copy of the file manager workarea in the 
file buffer after patching the file position low-order byte. 
Seems to me that jumping directly to SAE7E, without the two 
lines saving the stack pointer above, would avoid the very 
dangerous step of jumping into the middle of a subroutine. But 
in any case, as Tom Weishaar points out, the code is wrong in 
that it does not recover the higher bytes of the file position. 
Will APPEND ever really be fixed? 


A few months back I published a patch for faster LOAD, etc. in 
these pages which used the space from $BA69 through $BA95. I 
suggest you use the older version of DOS 3.3 for the time 
being. But eventually you may be forced to find another home 
for the fast LOAD patch. 
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C£estrom CHARACTER SETS 


One of the teatures hidden’ in many printers available today 

is their at tr» tG accept user-defined character sets. With the 
proper software. these custom characters are “downloaded” from 
your Appie If computer to the printer itn a fraction of a second. 
Gnce the oricter nas learned’ these new characters, they wil} 
be remembered until the printer is turned off. 


After the downloading operation, you can use your printer with 
Virtuall» an- word processor. Just think of the possibilities! 
There’s nothing like having your own CUSTOM CHARACTERS to help 
conver the message. And you still have access to those Built-in 


fonts as well' Here’s a quich look at some possible variations: 
BUILT-IN CUSTOM 

10CFI: AabbCcDdEeFFGgHh!I i JjKkK ARaBbLCcDdE€ef FOQHH 1's 3B SKK 

LZcFI: AaBbCcDdEeF ¢GqHh! i JjKk AaBbbCcDdtef FGgHh 1: 3 SKK 

17CFI: AaBbCcDdEeF #6qHh] id jKk AaBoCcLdEef ahh li J kK 

SCPI: Fa bbocc Dae eF F AaBo Ce DAE e& FF F 

SCFI: AaBbBbccDdEeF Ff AaBeoCc DIE ef F 

SCPI : AaBbCcDdEeF f AaBbCcHDdt ef F 


And let’s not forget Enhanced and Underined printing as well... 


AaBbCcDdEeFfGgHh!l i Jj kk AabbCcDdtef FEQHh1I1 I JHE 
AaBbtCcDdEeFfGgHhIiJjKk AabbCcDdbef FCQHED 1 3 jKK 


The Font Downloader & Character Editor software package has 

been developed by RAK-WARE to help you unleash the power of your 
printer. The basic package includes the downloading software wi th 
4 fonts to get you going. Also included is a character editor so 
that you can turnm your creativity loose. Use it to generate unique 
character fonts, patterns, symbols and graphics. A detailed user’s 
quide it provided on the program diskette. 


SYSTEM REQUIKERERTS: 

® APFLE ITI, APPLE II Plus, APPLE /““e or lookalike with 46K RAM 

* DUMB” Parallel Printer Intertace Board (like Apple’s Parallel 
Frinter Interface, TYMAC’s PPC-100 or equivalent? 


The Font Downloader & Editor packaqe is only 39.95 and is currently 
available for either the Apple Dot Matrix Printer or C.1ltoh SS10AF 
Cspecife printer). Epson FX-80 and OkiData versions coming soon. 
Enclose paxyment with order to avoid $3.00 handling & postage charge. 


mR —- we fF HK € 
41 Ralph Road West Urange New Jersey 07052 


Say You Saw It In APPLE ASSEMBLY LINE! 
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S-C Macro Cross Assemblers 


The high cost of dedicated microprocessor development systems has 
forced many technical people to look for alternate methods to develop 
programs for the various popular microprocessors. Combining the 
versatile Apple II with the S-C Macro Assembler provides a cost 
effective and powerful development system. Hobbyists and engineers 
alike will find the friendly combination the easiest anda best way to 
extend their skills to other microprocessors. 


The S-C Macro Cross Assemblers are all identical in operation to the 
S-C Macro Assembler; only the language assembled is different. They 
are sold as upgrade packages to the S-C Macro Assembler. The S-C 
Macro Assembler, complete with 100-page reference manual, costs $80; 
once you have it, you may add as many Cross Assemblers as you wish at 
a nominal price. The following S-C Macro Cross Assembler versions are 
now available, or soon will be: 


Motorola: 6800/6801/6802 now $32.50 

6805 now $32.50 

6809 now $32.50 

68000 now $50.00 

Intel: 8048 now $32.50 

8051 now $32.50 

8085 now $32.50 

Zilog: Z-80 now $32.50 

RCA: 1802/1805 now $32.50 

Rockwell: 65C02 now $20.00 

DEC: PDP-11/LSI-11 now $50.00 
The S-C Macro Assembler family is well known for its ease-of-use and 
powerful features. Thousands of users in over 30 countries and in 
every type of industry attest to its speed, dependablility, and 
user-friendliness. There are 20 assembler directives to provide 


powerful macros, conditional assembly, and flexible data generation. 
INCLUDE and TARGET FILE capabilities allow source programs to be as 
large as your disk space. The integrated, co-resident source program 
editor provides global search and replace, move, and edit. The EDIT 
command: has 15 sub-commands combined with global selection. 


Each S-C Assembler diskette contains two complete ready-to-run 
assemblers: one is for execution in the mother-board RAM; the other 
executes in a 16K RAM Card. The HELLO program offers menu selection 
to load the version you desire. The disks may be copied using any 
standard Apple disk copy program, and copies of the assembler may be 
BSAVEd on your working disks. 


S-C Software Corporation has frequently been commended for outstandim 
support: competent telephone help, a monthly (by subscription) 
newsletter, continuing enhancements, and excellent upgrade policies. 


S-C Software Corporation (214) 324-2050 
P.O. Box 280300, Dallas, Texas, 75228 


Page 30....Apple Assembly Line......July, 1983......Copyright (C) S-C SOFTWARE 


More opcodes for the S-C MACRO ASSEMBLER........-R.F. O'Brien 


While using the assembler I felt that it was a pity that the 
BGE and BLT instructions had not been incorporated especially 
as it would only have meant an extra 6 bytes of code. This 
Binimal extra overhead is because of the way opcodes are 
handled in the assembler. 


Take for example the BRANCH opcode table, which resides in 
locations S$EF5B-EF93. ($2E29-2E47 for RAM version.) [ These 


addresses are for version 1.0 ] 


This table is preceded by a 2-byte descriptor and ends as one 
would expect with a 00 as end-of-table marker. The descriptor 
in this case is 0302, i.e. 3-byte entries having a 2-byte name. 
The table holds the standard 8 6502-opcodes and the 10 Sweet-16 
opcodes, interestingly the B of each instruction name has been 
dropped, saving 18 bytes. 


The entries in the table consist of the last 2 letters of the 
instruction name followed by the hex code. In the case of 
2-letter names the entry consists of the second letter plus a 
space ($20) followed by its hex code. 


I decided that I could dispense with the SW-16 codes BM] and 
BNM1 without suffering too much if I wanted to write Sweet-16 
code in my programs. However, I found that to incorporate the 
new codes they would have to be placed between the 6502 codes 
and the SW-16 codes in the table. 


It was just a matter of pushing the code for BR to BNZ up in 
RAM 6 bytes and slotting in the code for BLT and BGE. 


To install the code for the two new opcodes just enter the 
following at any convenient location e.g.$4000 and BSAVE as 
BLT/BGE .CODE ,A$4000,LS1F 


:$4000:47 45 BO 4C 54 90 ("G E BO LT 90") 


2$:52 20 01 4E 43 02 43 20 03 50 20 04 
:$:4D 20 05 5A 20 06 4E 5A 07 53 20 OC 00 


To install in LC-Version just enter: 


:$C083 C083 write enable card. 
:BLOAD BLT/BGE.CODE ,ASEF75 
:$C080 write protect card. 


To install in RAM-Version just enter: 
:BLOAD BLT/BGE.CODE,A$2E29 
If you never use Sweet-16 you only need to use the first 6 


bytes of the above code. However, this will wipe out the BR and 
BNC codes in the table. 
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Now you can use either BCC or its synonym BLT (Branch if Less 
Than) and BCS or BGE (Branch if Greater than or Equal to) in 
your programs and have them assembled correctly without using 
macro definitions. 


The load address for the patch file for version 1.1 will vary 
depending on which of the 8 versions you are patching: 


40-col //e Videx STB-80 
Motherboard $31A9 318D 3274 329D 


RAM Card SF2C3 F2A7 F397 F3CO 


Bobby Deen's Latest Stuff 


Bobby Deen is a name you may remember seeing in these pages in 
several past issues. He will be entering Texas A & M 
University this fall. Bobby programmed most of the cross 
assembler modules for the S-C Macro Assembler, some parts of 
the S-C Word Processor, about half of the yet-to-be-released 
18-digit commercial math package (S-C DP18), and parts of the 
CPR Training a bbe we did for the American Heart Association. 
A man of many interests, Bobby also has produced some excellent 
music disks for the ALF music synthesizers (or any Alf 
compatibles, such as Applied Engineering), and now a fantastic 
"Othello" game. 


His six-voice renditions of the William Tell Overture by 
Rossini and Tchaikovsky's Nutcracker Suite are outstanding, and 
the price is only $10. If you have a synthesizer, you ought to 
have Bobby's music. 


Bobby's Othello program is available now for an introductory 
price of only $20. Of course he wrote it in assembly language, 
so it is FAST, and has excellent hi-res graphics. You select 
among six skill levels; Apple can suggest your next move; you 
can swap sides with the computer; you can modify the boara in 
mid-game (cheat?); you can pit the computer against itself. 
Whenever two or more moves tie for the machine's best next 
move, Apple randomizes its choice. This way you never play the 
same identical game twice. 


Order either of these disks from S-C Software. 


Apple Assembly Line is published monthly by S-C SOFTWARE CORPORATION, P.O. Box 
280300, Dallas, Texas 75228. Phone (214) 324-2050. Subscription rate is $15 
per year in the USA, sent Bulk Mail; add $3 for First Class postage in USA, 
Canada, and Mexico; add $13 postage for other countries. Back issues are 
available for $1.50 each (other countries add $1 per back issue for postage). 


All material herein is copyrighted by S-C SOFTWARE CORPORATION, all rights 
reserved. (Apple is a registered trademark of Apple Computer, Inc.) 
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